unit DokumentRpt;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DBBaseRpt, DB, DBClient, alBaseDataSet, MConnect,
  ExcelRpt, EXLReportExcelTLB, EXLReportBand, EXLReport;

type
  TrptDokument = class(TrptExcel)
    procedure OnFormatCell(Sender: TObject; Band: TEXLReportBand; RowInTemplate,
      RowInReport, ColumnInReport: Integer; Report: _Worksheet;
      const CellValue: OleVariant);
    procedure OnSetCellValue(Sender: TObject; Band: TEXLReportBand;
      RowInTemplate, RowInReport, ColumnInReport: Integer;
      var CellValue: OleVariant);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

implementation

{$R *.dfm}

procedure TrptDokument.OnFormatCell(Sender: TObject; Band: TEXLReportBand;
  RowInTemplate, RowInReport, ColumnInReport: Integer; Report: _Worksheet;
  const CellValue: OleVariant);
begin
  inherited;
  //
end;

procedure TrptDokument.OnSetCellValue(Sender: TObject; Band: TEXLReportBand;
  RowInTemplate, RowInReport, ColumnInReport: Integer;
  var CellValue: OleVariant);
begin
  inherited;
  //
end;

end.
